/* TABLE 1 PANEL C & D */
cd "C:\Users\Public\Documents\ImmPanelRevis19\ImmPanelRevis19"
use "Donnees\pit\instru2017.dta", clear
drop if ze=="9306" | ze=="9109" | ze=="9110" | ze=="9116" | ze=="8307" | ze=="7206" | ze=="5214" 
drop if ze=="4101" | ze=="4111" | ze=="8306"
xi, pre(Y_) i.an*lsconst i.an*lstrad i.an*lsntrad i.an*lzepop
drop if an==1968
drop if an==1976

egen time=group(an)
egen ize=group(ze)
xtset ize time

/* lagged twice */
gen l2dimm=L.ldimm
gen l2dimm75=L.ldimm75
gen l2dimtm2=L.ldimtm2

/* PANEL C */
bysort an: corr dimm ldimm
bysort an: corr dimm l2dimm

/* PANEL D */
bysort an: corr dimm75 ldimm75
bysort an: corr dimm75 l2dimm75
